/* ScrollingText.m
*  Purpose: A subclass of Application and the class which runs the show.
*
*  You may freely copy, distribute, and reuse the code in this example.
*  NeXT disclaims any warranty of any kind, expressed or  implied, as to its fitness
*  for any particular use.
*
*/

#import "ScrollingText.h"
#import "Document.h"

@implementation ScrollingText : Application

- newDocument:sender
{
	id newDoc = [[Document alloc] init];
	[newDoc center];
	/* Without this explicit display of the window, */
	/* the scroll bars will not appear at all. */
	[newDoc display];  /* bug repellant */
	[newDoc makeKeyAndOrderFront:nil];
	return self;
}

@end



